home *** CD-ROM | disk | FTP | other *** search
/ Aminet 35 / Aminet 35 (2000)(Schatztruhe)[!][Feb 2000].iso / Aminet / gfx / misc / gnuplot-src.lha / gnuplot-3.7.1src / gnuplot-3.7.1.lha / gnuplot-3.7.1 / make_vms.com < prev    next >
Encoding:
Text File  |  1999-10-01  |  1.5 KB  |  69 lines
  1. $!
  2. $! GNUPLOT make program for VMS, Vers. 1.2, 1996/07/03
  3. $! (Rolf Niepraschk, niepraschk@ptb.de)
  4. $!
  5. $! This command procedure compiles and links GNUPLOT with MMS or MMK or
  6. $! invokes the dcl procedure BUILDVMS.COM
  7. $!
  8. $! Usage: @MAKE_VMS P1 [P2]
  9. $!    P1 = compiler ("DECC" or "VAXC" or "GNUC" or special make file if P2 = "")
  10. $!         default is "DECC"
  11. $!    P2 = special make file (eg. for testing), default is "DESCRIP.MMS"
  12. $!
  13. $ SAY = "WRITE SYS$OUTPUT"
  14. $ AXP = 0
  15. $ IF F$GETSYI("ARCH_TYPE") .NE. 1 THEN AXP = 1
  16. $!
  17. $ P1 = F$EDIT(P1,"UPCASE")
  18. $ IF P2 .NES. ""
  19. $ THEN D_FILE = P2
  20. $ ELSE D_FILE = "MAKEFILE.VMS"
  21. $ ENDIF
  22. $!
  23. $ COMPILER = ""
  24. $ IF P1 .EQS. "DECC" .OR. P1 .EQS. ""
  25. $ THEN
  26. $   DECC = 1
  27. $   COMPILER = "DECC"
  28. $ ELSE
  29. $   IF P1 .EQS. "VAXC"
  30. $   THEN
  31. $     VAXC = 1
  32. $     COMPILER = "VAXC"
  33. $   ELSE
  34. $     IF P1 .EQS. "GNUC"
  35. $     THEN
  36. $       GNUC = 1
  37. $       COMPILER = "GNUC"
  38. $     ENDIF
  39. $   ENDIF
  40. $ ENDIF
  41. $ IF COMPILER .EQS. ""
  42. $ THEN
  43. $   DECC = 1
  44. $   COMPILER = "DECC"
  45. $   D_FILE = P1
  46. $ ENDIF
  47. $!
  48. $ DCL_PROC = "BUILDVMS.COM"
  49. $ COMMAND = ""
  50. $ IF F$TYPE(MMK) .NES. ""
  51. $   THEN COMMAND = "MMK"
  52. $ ELSE
  53. $   IF F$SEARCH("SYS$SYSTEM:MMS.EXE") .NES. "" THEN COMMAND = "MMS"
  54. $ ENDIF
  55. $!
  56. $ MACRO = ""
  57. $ IF AXP THEN MACRO = "/MACRO=__ALPHA__=1"
  58. $ IF COMMAND .NES. ""
  59. $ THEN
  60. $   SAY "Make Gnuplot with ''COMMAND' and ''COMPILER'."
  61. $   SAY ""
  62. $   'COMMAND' /DESCRIPTION='D_FILE' 'MACRO' /IGNORE=WARNING
  63. $ ELSE
  64. $   SAY "Make Gnuplot with DCL procedure ''DCL_PROC'."
  65. $   SAY ""
  66. $   @'DCL_PROC'
  67. $ ENDIF
  68. $ EXIT
  69.